Listin Gambas2
Création d'un programme en Gambas2 : un répertoire téléphonique pas à pas
Origine : http://listingambas.blogspot.com/2011/06/formulario-y-modulo-fechas.htmlFormulaire et Module Date
Face à l'inconfort de la
saisie d'une date et les différentes
manières
de
l'introduire (on
peut mettre en format français 01/12/2010, ou américain 2010/12/01 ,
ou «premier Décembre 2010») nous allons améliorer la
façon d'entrer la date de nos données avec un petit formulaire qui nous
la passera facilement au format Année / mois / jour (le meilleur pour trier par
date), en nous affichant un calendrier.
Pour cela, nous allons créer un petit bouton ToolBoutonCalendrier
,
qui lorsqu'il est cliqué appelle un nouveau formulaire Fcalendrier.demandedate
,
PUBLIC
SUB ToolBoutonCalendrier_Click
()
Fcalendrier. Demande_Date
FIN
Créons un nouveau formulaire, appelé Fcalendrier, avec un bouton "Accepter" et un DateChooser appelé datechoix, où l'on choisit la date.

Avec le code suivant dans le formulaire Fcalendrier :
' Gambas class file
PUBLIC
SUB
DateChoix_Change ()
ME . Caption
= DateChoix. Value
END
PUBLIC
SUB
Form_Open ()
ME . Caption
= DateChoix. Value
END
PUBLIC
SUB
Demande_Date ()
FCalendrier.
ShowModal
END
PUBLIC
SUB ButtonAccepter_Click ()
FMain. TextBoxDate
. text
=
Format
(FCalendrier.. DateChoix
. Value
, "yyyy/mm/dd"
)
ME
. Close
END
La fonction la plus intéressante est format qui fait que la date lue par le datechooser est convertie au format année / mois / jour "yyyy/mm/dd"